home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Guinness Encyclopedia
/
The Guinness Encyclopedia - Wayzata Technology (3221-1B) (Disc 1) (1995).iso
/
window
/
main.tbk
(
.txt
)
< prev
next >
Wrap
Asymetrix ToolBook File
|
1995-08-15
|
248KB
|
1,236 lines
pnpnp
];Ad\
CDBSE&File
&Open... Ctrl+O
&Save Ctrl+S
Save &As...
saveas
&Import...
import
&Export...
export
Print Set&up...
printsetup
&Print Pages... Ctrl+P
printpages
Prin&t Report...
printreport
Send &Mail...
sendmail
&Run...
E&xit Alt+F4
&Edit
&Undo Ctrl+Z
Cu&t Ctrl+X
&Copy Ctrl+C
&Paste Ctrl+V
paste
C&lear Del
clear
Select &All Shift+F9
selectall
Select Pa&ge Shift+F12
selectpage
&Size to Page F11
sizetopage
F&ind... F5
Re&place...
replace
Aut&hor F3
author
&Text
&Character... F6
character
&Paragraph... F7
paragraph
&Regular Ctrl+Space
regular
&Bold Ctrl+B
&Italic Ctrl+I
italic
&Underline Ctrl+U
underline
Stri&keout Ctrl+K
strikeout
Superscrip&t/Subscript
superscriptSubscript
&Normal Script
normalscript
Su&bscript Ctrl+L
subscript
Su&perscript Ctrl+Shift+L
superscript
&Show Hotwords F9
showhotwords
&Page
&Next Alt+Right
&Previous Alt+Left
previous
&First Alt+Up
first
&Last Alt+Down
&Back Shift+F2
&History... Ctrl+F2
history
N&ew Page Ctrl+N
newpage
&Help
&Contents F1
contents
Status &Bar F12
statusbar
Reader
Author
createCDMediaPath
4cdDrive
linkDLL "tb30DOS.
STRING getCDDriveList()
FileOnlyList(
allCDDrives =
r = checkCDDrive(allCDrives)
= -1
--
"The CD
required
-- & " program.
Place
the CD-ROM "\
-- & "drive now
click OK."\
--
f"OK"
"QUIT"
--
--
It = "
--
--
i = 3
= -1
"Unable
locate CD,"\
& "exiting"
<> -1
& ":\help;"\
& ":\animatio;" &
& ":\videos;"\
& ":\
\nasa;" &
& ":\
)\wtn"
& ":\
currDrive =
getFileOnlyList(
)& ":\
\*.mov","","")
c"004-4"
enterApplication
WTIgoButton CardN
= True
= "x"
syslockScreen = False
card
stack "Guinness:Mac:encyclopedia"
--ConvertIt!: expression used
zmay need tweaking:
WTIgotoPage
WTIgotopage
Q( ((
)/2) ) * 2
"p" & pp & "-1"
(pp < 10)
-- pad
f000's
NumToChar(pp)
"p00" & pp & "-1"
( pp < 99 )
"p0" & pp & "-1"
&& pp &&
(pp < 74)
8"Nature.tbk"
(pp < 106)
(ppp)
8"Earth.
(pp < 198)
8"Living.
(pp < 252)
8"Human.
(pp < 302)
8"World.
(pp < 358)
8"Technol.
(pp < 456)
8"History.
(pp < 498)
8"Religion.
(pp < 566)
8"Arts.
(pp < 600)
8"Music.
(pp < 656)
8"Languag.
"Sorry, Countries
xavailable here."
following handlers were added
are necessary
-- support
translated scripts
"Show Buttons over map"
Text
c"Options"
"Wayzata
Factbook Help"
"About
"tbkmm.sbk"
tbkmmInitializeSystem
c"Go"
c"Edit"
separator 1
"Open"
"Send Mail"
"Run"
"Save"
As"
"Import"
"Export"
"Select
"Replace"
"Size
c"Go"
"Main"
c"Go"
"Go Back"
c"Go"
c"Go"
"Gallery"
c"Go"
"Encyclopedia"
c"Go"
"Explorer"
c"Go"
"Languages"
c"Go"
"Credits"
c"Go"
"Search"
c"Go"
Results"
c"Go"
SearchResults
4holdMatchList, holdGoList
4searchString
path =
"HitList"
defaultPage
d& "hitlist.
= = "
: " &
close
: " &
must be performed
"Finder"
8"explorer.
J"Caption" = 0
" = 0
J"SeeAlso" = 0
'"Outline"
sendtoBack
WTINextPage
xNum =
hereNum =
8"main.
WTInextPage
WTIPreviousPage
GoBack
WTIGoBack
sysLockscreen =
WTIHelp
WTIQuit
WTIPrintText
-- cNumber =
= " &
printReport
WTIPrintImage
'"Picture"
B"CopyImage"
= " &
WTICopyImage
WTIMain
sysLackScreen =
WTIGallery
WTIEncyclopedia
WTIExplorer
WTILanguages
sysLoackScreen =
WTICredits
sults : "
.&+ +E
False
Languages of the World
sysLoackScreen
Language.tbk
Languages
WTILanguages
WTICredits
Credits
.&+ +E
.&+ +E
Credits.tbk
WTICredits
& ":\a
Reader
Author
createCDMediaPath
4cdDrive
linkDLL "tb30DOS.
STRING getCDDriveList()
FileOnlyList(
allCDDrives =
r = checkCDDrive(allCDrives)
= -1
--
"The CD
required
-- & " program.
Place
the CD-ROM "\
-- & "drive now
click OK."\
--
f"OK"
"QUIT"
--
--
It = "
--
--
i = 3
= -1
"Unable
locate CD,"\
& "exiting"
<> -1
& ":\help;"\
& ":\animatio;" &
& ":\videos;"\
& ":\
\nasa;" &
& ":\
)\wtn"
& ":\
currDrive =
getFileOnlyList(
)& ":\
\*.mov","","")
c"004-4"
enterApplication
WTIgoButton CardN
= True
= "x"
syslockScreen = False
card
stack "Guinness:Mac:encyclopedia"
--ConvertIt!: expression used
zmay need tweaking:
WTIgotoPage
WTIgotopage
Q( ((
)/2) ) * 2
"p" & pp & "-1"
(pp < 10)
-- pad
f000's
NumToChar(pp)
"p00" & pp & "-1"
( pp < 99 )
"p0" & pp & "-1"
&& pp &&
(pp < 74)
8"Nature.tbk"
(pp < 106)
(ppp)
8"Earth.
(pp < 198)
8"Living.
(pp < 252)
8"Human.
(pp < 302)
8"World.
(pp < 358)
8"Technol.
(pp < 456)
8"History.
(pp < 498)
8"Religion.
(pp < 566)
8"Arts.
(pp < 600)
8"Music.
(pp < 656)
8"Languag.
"Sorry, Countries
xavailable here."
following handlers were added
are necessary
-- support
translated scripts
"Show Buttons over map"
Text
c"Options"
"Wayzata
Factbook Help"
"About
"tbkmm.sbk"
tbkmmInitializeSystem
c"Go"
c"Edit"
separator 1
"Open"
"Send Mail"
"Run"
"Save"
As"
"Import"
"Export"
"Select
"Replace"
"Size
c"Go"
"Main"
c"Go"
"Go Back"
c"Go"
c"Go"
"Gallery"
c"Go"
"Encyclopedia"
c"Go"
"Explorer"
c"Go"
"Languages"
c"Go"
"Credits"
c"Go"
"Search"
c"Go"
Results"
c"Go"
SearchResults
4holdMatchList, holdGoList
4searchString
path =
"HitList"
defaultPage
d& "hitlist.
= = "
: " &
close
: " &
must be performed
"Finder"
8"explorer.
J"Caption" = 0
" = 0
J"SeeAlso" = 0
'"Outline"
sendtoBack
WTINextPage
xNum =
hereNum =
8"main.
WTInextPage
WTIPreviousPage
GoBack
WTIGoBack
sysLockscreen =
WTIHelp
WTIQuit
WTIPrintText
-- cNumber =
= " &
printReport
WTIPrintImage
'"Picture"
B"CopyImage"
= " &
WTICopyImage
WTIMain
sysLackScreen =
WTIGallery
WTIEncyclopedia
WTIExplorer
WTILanguages
sysLoackScreen =
WTICredits
<BookPath>
:HDMEDIAPATH
Created by: ConvertIt! v1.5
DLL Version: 1.5 of Apr 28 1992 11:33:15
Creation date: 6/5/95
cvtitInfo
System
System
W:\help;W:\animatio;W:\videos;W:\videos\nasa;W:\videos\wtn
:CDMEDIAPATH
W:\help;W:\animatio;W:\videos;W:\videos\nasa;W:\videos\wtn
Languages
Languages of the World
openWindow
openWindow
ge id 1 of Book "LANGUAGE.TBK"
HitList
ge id 0 of Book "C:\NEWGNS\HITLIST.TBK"
Search Results :
Table of Contents
false
marked
New Button
Credits
buttonUp
8"Credits"
false
showNameProp
New Button
buttonUp
false
showNameProp
gallery
Gallery.tbk
buttonUp
8"Gallery.tbk"
false
showNameProp
encycl
Encyclop.tbk
buttonUp
8"Encyclop.tbk"
false
showNameProp
Explorer.tbk
buttonUp
= True
8"Explorer.tbk"
= False
false
showNameProp
GWTIhelp
buttonUp
WTIhelp
false
showNameProp
]WTIquit
buttonUp
WTIquit
credits.tbk
buttonUp
8"credits.tbk"
B\KK\
iKK\K
K\K\B
PC99=X
E\\K\\
rs_VH
\iKK\\B
i\KK\
B\KK\
iKK\K
K\KKB
/\KK\K<
D\\KK\K
PC9==X
E\\K\\
KLL\D
K\KPK
\iKK\
i\KD\i
.KDKi
0\KK\K<
K\KPK
KE9G;
;.KDKi
i\KPE
KE9G;
\iKPE
#\K\iL
#DEE2H
0\K\iL
i\KKE
BK\\XG
#DEE2A
$LKi2
$LK\E
dLL\K
\\KLw
`KL\9
YLL\K
lKL\<
)ELK\/
T1LK\/
rdLKi
ukdLKi
\\e?uu
uy9\KK
K\d|v
KKd|$
hdK\M
hdK\M
_Aw\K%
\Keruu
_Ax\K%
T\Ker@
qwd$+
oBKK8
5)BK$
uqwd$2
5)BK$
TLDK1
deNsu
\DKBo
TLKK1
(KD1)
5)HK1
(KD1)
F\KD\$
Fb8K>
\H9bT
TT88JK
5\KK\$
KEK\+
\\DK\
\H9bT
TF88JK
QQN@N
4N@N@_
KEK\+
\\DK\
QQN@N
4N@N@_
K\K\/
\KK\K
XC9==X
E\\K\\
B\KK\
iKK\K
K\KKB
i\KK\i
PC9==X
E\\K\\
/\KK\\/
\iKK\
i\KD\i
K\KLK
0\KK\K<
;.KLKi
K\KPK
;.KDKi
iKL9G
iiKPE
KE9G;
\iKPE
i\KKL
i\KKE
#DEE2A
#DEE2A
B\K\X
$LK\E
$LK\E
dLL\\
\\KLw
lKL\9
dLL\K
\\KLw
lKL\<
)ELK\/
KiKd/
u*+LK\/
pdLKi
CiLdmu
rdLKi
\\n?r
upYKi
hdK\M
hdK\M
B\nY1
_AwKK%
TKKer
_Ax\K%
TKDd`
ugwd$+
qwd$+
($Ywpuu
5)BK$
5)BK$
\DKBo
TLKK1
(K>1)
5bHKE
(KD1)
5)8K>
F\KD\
\H8bT
TF88JK
5KKD\$
\H8bT
TF88JK
KLK\+
\\DK\
\KEK\+
@"N@N
QQ6@6
4N@N@@
j^j^&
&q~^}}
generic
false
dontSearch
Table of Contents
generic
false
dontSearch
Reader
Author
,%H.%
checkCDDrive
Unable to locate CD,
:\help;
exiting
:\videos;
allCDDrives
getCDDriveList
getFileOnlyList
:\videos\wtn
tb30DOS.DLL
cdDrive
:\animatio;
:\videos\nasa;
allCDrives
0wgetCDDriveList
createCDMediaPath
,%H.%
getFileOnlyList
:\animatio\*.mov
004-4
currDrive
checkCDDrive
createCDMediaPath
enterApplication
.&+ +E
.&+ +E
WTIgotoPage
WTIgoButton
V, #>
V, #>
V, #>
.&+ +E
.&+ +E
.&+ +E
.&+ +E
.&+ +E
.&+ +E
.&+ +E
.&+ +E
.&+ +E
.&+ +E
.&+ +E
History.tbk
Religion.tbk
Living.tbk
Languag.tbk
Earth.tbk
Human.tbk
Technol.tbk
Nature.tbk
Arts.tbk
Sorry, Countries of the World is not available here.
Music.tbk
World.tbk
WTIgotopage
leaveBook
Save As
Import
Export
Send Mail
Encyclopedia
Go Back
Explorer
Credits
Search
Gallery
Languages
Search Results
enterBook
Search Results :
HitList
hitlist.tbk
holdMatchList
A search must be performed first.
searchString
SearchResults
.&+ +E
.&+ +E
Finder
explorer.tbk
Search
enterPage
.&+ +E
.&+ +E
main.tbk
hereNum
number
WTINextPage
.&+ +E
.&+ +E
hereNum
main.exe
WTIPreviousPage
WTIGoBack
GoBack
.&+ +E
.&+ +E
WTIGoBack
GWTIHelp
.&+ +E
.&+ +E
help.tbk
WTIHelp
WTIQuit
qDWTIMain
.&+ +E
.&+ +E
main.tbk
False
sysLackScreen
WTIMain
WTIGallery
Gallery
.&+ +E
.&+ +E
Gallery.tbk
WTIGallery
WTIEncyclopedia
Encyclopedia
.&+ +E
.&+ +E
encyclop.tbk
WTIEncyclopedia
WTIExplorer
Explorer
.&+ +E
.&+ +E
Explorer.tbk
WTIExplorer
%!WTILanguages
Languages
.&+ +E
.&+ +E
False
Languages of the World
sysLoackScreen
Language.tbk
Languages
WTILanguages
WTICredits
Credits
.&+ +E
.&+ +E
Credits.tbk
WTICredits
nd WTICred
mmwidget_controls
adjustControls
stretchStage
whatStage
stageObj
checkStageSize
myClip
setMySize
newClip
mediaSizing
whatStage
setMySize
mediaSizing
myStage
mmwidget_controls
stretchStage
,3clipRef
whatStage
setMySize
showWidgetsProps
,3clipRef
mmwidget_controls
adjustControls
moved
mmwidget_controls
adjustControls
sized
mmYieldApp
EushowClip
mmWidgetSysBook
(hopenClip
TB30WIN.DLL
AUTHOR
enterPage
mmWidgetSysBook
kautoCloseMedia
closeClip
,3clipRef
AUTHOR
leavePage
myClip
_jcheckStageSize
,3clipRef
setClipControls
whatStage
stageObj
playClip
.&+ +E
.&+ +E
myClip
_jcheckStageSize
,3clipRef
createCDMediaPath
openClip
,3clipRef
closeClip
,3clipRef
pauseClip
,3clipRef
stopClip
myClip
,3clipRef
whatStage
stageObj
showClip
,3clipRef
Z>isReady
seekClip
,3clipRef
Z>isReady
seekClipFromEnd
myClip
stepSize
,3clipRef
m{stepDist
Z>isReady
stepClip
myClip
stepSize
,3clipRef
m{stepDist
Z>isReady
stepClipBack
setClipControls
mmNotify
mmYieldApp
Unhandled:
clipStat
seeking
paused
,3clipRef
stopped
playing
closed
setClipControls
stage
whatStage
FALSE
playingpausedstopped
isReady
mmwidget_controls
adjustControls
stretchStage
whatStage
stageObj
checkStageSize
myClip
setMySize
newClip
mediaSizing
whatStage
setMySize
mediaSizing
myStage
mmwidget_controls
stretchStage
,3clipRef
whatStage
setMySize
showWidgetsProps
,3clipRef
mmwidget_controls
adjustControls
moved
mmwidget_controls
adjustControls
sized
mmYieldApp
EushowClip
mmWidgetSysBook
(hopenClip
TB30WIN.DLL
AUTHOR
enterPage
mmWidgetSysBook
kautoCloseMedia
closeClip
,3clipRef
AUTHOR
leavePage
myClip
_jcheckStageSize
,3clipRef
setClipControls
whatStage
stageObj
playClip
.&+ +E
.&+ +E
myClip
_jcheckStageSize
,3clipRef
createCDMediaPath
openClip
,3clipRef
closeClip
,3clipRef
pauseClip
,3clipRef
stopClip
myClip
,3clipRef
whatStage
stageObj
showClip
,3clipRef
Z>isReady
seekClip
,3clipRef
Z>isReady
seekClipFromEnd
myClip
stepSize
,3clipRef
m{stepDist
Z>isReady
stepClip
myClip
stepSize
,3clipRef
m{stepDist
Z>isReady
stepClipBack
setClipControls
mmNotify
mmYieldApp
Unhandled:
clipStat
seeking
paused
,3clipRef
stopped
playing
closed
setClipControls
stage
whatStage
FALSE
playingpausedstopped
isReady
mmwidget_controls
adjustControls
stretchStage
whatStage
stageObj
checkStageSize
myClip
setMySize
newClip
mediaSizing
whatStage
setMySize
mediaSizing
myStage
mmwidget_controls
stretchStage
,3clipRef
whatStage
setMySize
showWidgetsProps
,3clipRef
mmwidget_controls
adjustControls
moved
mmwidget_controls
adjustControls
sized
mmYieldApp
EushowClip
mmWidgetSysBook
(hopenClip
TB30WIN.DLL
AUTHOR
enterPage
mmWidgetSysBook
kautoCloseMedia
closeClip
,3clipRef
AUTHOR
leavePage
myClip
_jcheckStageSize
,3clipRef
setClipControls
whatStage
stageObj
playClip
.&+ +E
.&+ +E
myClip
_jcheckStageSize
,3clipRef
createCDMediaPath
openClip
,3clipRef
closeClip
,3clipRef
pauseClip
,3clipRef
stopClip
myClip
,3clipRef
whatStage
stageObj
showClip
,3clipRef
Z>isReady
seekClip
,3clipRef
Z>isReady
seekClipFromEnd
myClip
stepSize
,3clipRef
m{stepDist
Z>isReady
stepClip
myClip
stepSize
,3clipRef
m{stepDist
Z>isReady
stepClipBack
setClipControls
mmNotify
mmYieldApp
Unhandled:
clipStat
seeking
paused
,3clipRef
stopped
playing
closed
setClipControls
stage
whatStage
FALSE
playingpausedstopped
isReady
mmwidget_controls
adjustControls
stretchStage
whatStage
stageObj
checkStageSize
myClip
setMySize
newClip
mediaSizing
whatStage
setMySize
mediaSizing
myStage
mmwidget_controls
stretchStage
,3clipRef
whatStage
setMySize
showWidgetsProps
,3clipRef
mmwidget_controls
adjustControls
moved
mmwidget_controls
adjustControls
sized
mmYieldApp
EushowClip
mmWidgetSysBook
(hopenClip
TB30WIN.DLL
AUTHOR
enterPage
mmWidgetSysBook
kautoCloseMedia
closeClip
,3clipRef
AUTHOR
leavePage
myClip
_jcheckStageSize
,3clipRef
setClipControls
whatStage
stageObj
playClip
.&+ +E
.&+ +E
myClip
_jcheckStageSize
,3clipRef
createCDMediaPath
openClip
,3clipRef
closeClip
,3clipRef
pauseClip
,3clipRef
stopClip
myClip
,3clipRef
whatStage
stageObj
showClip
,3clipRef
Z>isReady
seekClip
,3clipRef
Z>isReady
seekClipFromEnd
myClip
stepSize
,3clipRef
m{stepDist
Z>isReady
stepClip
myClip
stepSize
,3clipRef
m{stepDist
Z>isReady
stepClipBack
setClipControls
mmNotify
mmYieldApp
Unhandled:
clipStat
seeking
paused
,3clipRef
stopped
playing
closed
setClipControls
stage
whatStage